home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 25 / 64er_Magazin_Sonderheft_25_19xx_Markt__Technik_de.d64 / switch o-u.bas (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  186b  |  8 lines
  1. 0 rem
  2. 136 open1,8,15,"ui"
  3. 232 rem *** spurschaltprogramme ***
  4. 236 print#1,"m-w"chr$(6)chr$(0)chr$(2)chr$(1)chr$(0)
  5. 238 print#1,"m-w"chr$(0)chr$(0)chr$(1)chr$(128)
  6. 240 print#1,"m-r"chr$(0)chr$(0)chr$(1):get#1,a$:ifasc(a$+chr$(0))>127then240
  7. 250 close1:end
  8.